From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 31 Jul 2004 03:39:49 +0000 (+0000)
Subject: (with-local-quit): Doc fix.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~21511
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=20d35e937ae114ba01450a958a4eb7f9222cc1be;p=emacs.git

(with-local-quit): Doc fix.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 1e30a127f71..8282e3a9316 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1894,7 +1894,10 @@ See also `with-temp-file' and `with-output-to-string'."
 	 (kill-buffer nil)))))
 
 (defmacro with-local-quit (&rest body)
-  "Execute BODY with `inhibit-quit' temporarily bound to nil."
+  "Execute BODY, allowing quits to terminate BODY but not escape further.
+When a quit terminates BODY, `with-local-quit' requests another quit when
+it finishes.  That quit will be processed in turn, the next time quitting
+is again allowed."
   (declare (debug t) (indent 0))
   `(condition-case nil
        (let ((inhibit-quit nil))